home *** CD-ROM | disk | FTP | other *** search
/ Die Ultimative Software-P…i Collection 1996 & 1997 / Die Ultimative Software-Pakete CD-ROM fur Atari Collection 1996 & 1997.iso / p / pov / povlisti.ngs / quarpara.pov < prev    next >
Encoding:
Text File  |  1992-07-02  |  1.5 KB  |  63 lines
  1. // Persistence Of Vision raytracer version 1.0 sample file.
  2.  
  3. // By Alexander Enzmann
  4. /* sample quartic scene file written by Alexander Enzmann */
  5.  
  6. #include "colors.inc"
  7. #include "shapes.inc"
  8. #include "textures.inc"
  9.  
  10. #declare Rectangle =
  11. intersection {
  12.    plane { < 1  0  0> 3 texture { color Clear } }
  13.    plane { <-1  0  0> 3 texture { color Clear } }
  14.    plane { < 0  1  0> 3 texture { color Clear } }
  15.    plane { < 0 -1  0> 3 texture { color Clear } }
  16.    plane { < 0  0  1> 1 texture { color Clear } }
  17.    plane { < 0  0 -1> 1 texture { color Clear } }
  18. }
  19.  
  20. /* Quartic parabola of sorts */
  21. object {
  22.    intersection {
  23.       quartic {
  24.          < 0.1   0.0   0.0  0.0   0.0   0.0   0.0   0.0   0.0  -1.0
  25.          0.0   0.0   0.0  0.0   0.0   0.0   0.0   0.0   0.0   0.0
  26.          0.0   0.0   0.0  0.0   0.0   0.0   0.0   0.0   0.0  -1.0
  27.          0.0   0.0  -1.0  0.0   0.9 >
  28.          texture {
  29.             color Red
  30.             phong 1.0
  31.             phong_size 20
  32.             ambient 0.2
  33.             diffuse 0.8
  34.          }
  35.       }
  36.       intersection { Rectangle }
  37.    }
  38.    bounded_by {
  39.       intersection { Rectangle }
  40.    }
  41.    /* translate <0 0 3> */
  42.    rotate <-30 0 0>
  43. }
  44.  
  45. camera {
  46.    location  <0.0  0.0 -10.0>
  47.    direction <0.0  0.0   1.0>
  48.    up        <0.0  1.0   0.0>
  49.    right     <1.33 0.0   0.0>
  50. }
  51.  
  52. object {
  53.    light_source { <200 30 -300>
  54.       colour White
  55.    }
  56. }
  57.  
  58. object {
  59.    light_source { <-200 30 -300>
  60.       colour White
  61.    }
  62. }
  63.